home *** CD-ROM | disk | FTP | other *** search
/ Chip 1997 March / CHIP Mart 1997.iso / SurfCam / SURFCAM.Z / P&WTAP.M3 < prev    next >
Text File  |  1996-04-01  |  4KB  |  115 lines
  1. name Pratt & Witney Tapematic
  2.  
  3. % 00
  4. / 00
  5. & 00
  6. N >4 ""
  7. X +->33 ;
  8. Y +->33 :
  9.     Z C40 +->33 Z
  10. a 00 ""
  11. G 2
  12. I 2
  13. J 2
  14. F 2
  15.  
  16. ModalLetters                          # List of letters that are modal    
  17.  
  18. ModalGs 0 1 2 3 73 74 76 80 81 82 83 84 85  # List of g codes that are modal    
  19.  
  20. Sequence#s N 0 1 1                    # Char, freq, incr & start          
  21. First#? N                             # Y or N  'Output 1st sequence no.  
  22. Last#? N                              # Y or N  'Output last sequence no. 
  23.  
  24. HCode X                               # X or X U  'Horizontal char.       
  25. VCode Y                               # Y or Y V  'Vertical char.         
  26.                                       # Depth char.                       
  27. FeedCode F                            # Feed rate char.                   
  28.  
  29. Comment ( )                           # Begin End comment char.           
  30.  
  31. Spindle 3 4 5                         # Cw, ccw & stop m codes            
  32. Coolant 8 9 7                         # On, Off & Mist m codes            
  33. DComp 41 42 40                        # Left, Right & Cancel m codes      
  34. LComp 43 49                           # On & Off codes                    
  35.  
  36. Feed G1                             # Linear move                       
  37. Rapid G0                            # Rapid positioning word            
  38. Cw G2                               # Circular move clockwise           
  39. Ccw G3                              # Circular move counter clockwise   
  40.  
  41. Inc/Abs G 91 90                       # Inc & Abs char. & values          
  42.  
  43. Work G                                # Work offset register              
  44.  
  45. CtrCode I J                           # I J or R or I J K L               
  46. Helical? N
  47.  
  48. Spaces? Y                             # Y or N  'Spaces between words     
  49.  
  50. Incremental? N                        # Y or N  'Inc or abs output        
  51. CtrIncremental? Y                     # Y or N  'Inc or abs I & J         
  52. ByQuadrants? N                        # Y or N  'Break arcs at quadrants  
  53.  
  54. UppercaseComments? Y                  # Y or N 'Require uppercase comments
  55.  
  56. Drill                                 # Drilling canned/manual cycle      
  57. N[Block] X[H] Y[V]
  58. end
  59.  
  60. Peck                                  # Pecking canned/manual cycle       
  61. N[Block] X[H] Y[V]
  62. end
  63.  
  64. Tap                                   # Tapping canned/manual cycle       
  65. N[Block] X[H] Y[V]
  66. end
  67.  
  68. LTap                                  # Left handed tapping cycle         
  69. N[Block] X[H] Y[V]
  70. end
  71.  
  72. Ream                                  # Reaming canned/manual cycle       
  73. N[Block] X[H] Y[V]
  74. end
  75.  
  76. Bore                                  # Boring canned/manual cycle        
  77. N[Block] X[H] Y[V]
  78. end
  79.  
  80. Back                                  # Back boring canned/manual cycle   
  81. N[Block] X[H] Y[V]
  82. end
  83.  
  84. Cancel                                # Cancel a canned/manual cycle      
  85. G80
  86. end
  87.  
  88. StartCode                             # Start of the program              
  89. %0 N0 X0 Y0
  90. End
  91.  
  92. 1stToolChange                         # First tool change                 
  93.   %0 N[Block] X[H] Y[V]
  94. End
  95.  
  96. ToolChange                            # Secondary tool changes            
  97. &0 X7 Y7
  98. End
  99.  
  100. EndCode                               # End of the program                
  101. &0 /0 X7 Y7
  102. End
  103.  
  104. LineCode                              # Linear move                       
  105. N[Block] X[H] Y[V]
  106. end
  107.  
  108. RapidCode                             # Rapid move                        
  109. a0 X[H] Y[V]
  110. end
  111.  
  112.  
  113. Replace ";" with ";"
  114. Replace ":" with ";"
  115.